--Connect control
--Instructions for a connection control method.
--Connect control
--Instructions for a connection control method

(a,b: object; c: boolean)
--a=source of the connection
--b=destination of the connection
--c=connection has been established or deleted
is
do
	if c then	-- connection has been established
		-- add your code here
	else		-- connection has been deleted
		-- add your code here
	end;
end;